home *** CD-ROM | disk | FTP | other *** search
- on startMovie
- global ghtmlnormfont, ghtmlheadfont, ghtmlttfont, ghtmlfontsize, ghtmlpath, ghtmllinkred, ghtmllinkgreen, ghtmllinkblue, ghtmlsmoothness, ghtmlmargin, gmac, gsep, ghandcursor
- set ghandcursor to [member "hand", member "handmask"]
- if the machineType = 256 then
- set gmac to 0
- set gsep to "\"
- else
- set gmac to 1
- set gsep to ":"
- end if
- htmlstartmovie()
- set the text of field "normfont" to ghtmlnormfont
- set the text of field "ttfont" to ghtmlttfont
- set the text of field "headfont" to ghtmlheadfont
- set the text of field "fontsize" to string(ghtmlfontsize)
- set the text of field "red" to string(ghtmllinkred)
- set the text of field "green" to string(ghtmllinkgreen)
- set the text of field "blue" to string(ghtmllinkblue)
- set the text of field "smooth" to string(ghtmlsmoothness)
- set the text of field "margin" to string(ghtmlmargin)
- set ghtmlpath to the moviePath
- end
-